home *** CD-ROM | disk | FTP | other *** search
- UBOUND(3I) Last changed: 1-6-98
-
-
- NNAAMMEE
- UUBBOOUUNNDD - Returns all the upper bounds of an array or a specified upper
- bound
-
- SSYYNNOOPPSSIISS
- UUBBOOUUNNDD (([AARRRRAAYY==] _a_r_r_a_y [,,[DDIIMM==]_d_i_m]))
-
- IIMMPPLLEEMMEENNTTAATTIIOONN
- UNICOS, UNICOS/mk, and IRIX systems
-
- SSTTAANNDDAARRDDSS
- Fortran 90
-
- DDEESSCCRRIIPPTTIIOONN
- The UUBBOOUUNNDD intrinsic function returns all the upper bounds of an array
- or returns a specified upper bound. It accepts the following
- arguments:
-
- _a_r_r_a_y Can be of any type. It must not be scalar. It must not be
- a pointer that is disassociated or an allocatable array that
- is not allocated. If _a_r_r_a_y is an assumed-size array, _d_i_m
- must be present with a value less than the rank of _a_r_r_a_y.
-
- _d_i_m Must be scalar and of type integer with a value in the range
- 1 <= _d_i_m <= _n, where _n is the rank of _a_r_r_a_y. The
- corresponding actual argument must not be an optional dummy
- argument.
-
- UUBBOOUUNNDD is an inquiry function. The name of this intrinsic cannot be
- passed as an argument.
-
- RREETTUURRNN VVAALLUUEESS
- The result type is default integer. It is scalar if _d_i_m is present;
- otherwise, the result is an array of rank one and size _n, where _n is
- the rank of _a_r_r_a_y.
-
- For an array section or for an array expression, other than a whole
- array or array structure component, UUBBOOUUNNDD((_a_r_r_a_y,,_d_i_m)) has a value
- equal to the number of elements in the given dimension. It has a
- value equal to the upper bound for subscript _d_i_m of _a_r_r_a_y if dimension
- _d_i_m of _a_r_r_a_y does not have size zero; it has the value zero if
- dimension _d_i_m has size zero.
-
- UUBBOOUUNNDD((_a_r_r_a_y)) has a value whose _ith component is equal to
- UUBBOOUUNNDD((_a_r_r_a_y,,_i)), for _i = 1, 2, ..., _n, where _n is the rank of _a_r_r_a_y.
-
- EEXXAAMMPPLLEESS
- Assume that AA is declared by the statement RREEAALL AA((22::33,, 77::1100)). In this
- case, the following are true:
-
- * UUBBOOUUNNDD((AA)) is [3, 10]
-
- * UUBBOOUUNNDD((AA,, DDIIMM == 22)) is 10.
-
- SSEEEE AALLSSOO
- _I_n_t_r_i_n_s_i_c _P_r_o_c_e_d_u_r_e_s _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-2138, for the
- printed version of this man page.
-
-